program testValueNumberingBadOrder;

class testValueNumberingBadOrder
BEGIN
   
   VAR aa, bb, cc, dd : integer;

FUNCTION testValueNumberingBadOrder;
BEGIN
   aa := bb + cc;
   dd := cc + bb
END

END
.

